10 REM ********************************
11 REM *                              *
12 REM *   ROM/RAM - COPY IN BASIC!   *
13 REM *                              *
14 REM ********************************
15 REM
20 A=160:B=192:FORG=0TO1:POKE53,0:POKE54,A:POKE780,255
21 POKE780,255:POKE781,PEEK(53):POKE782,PEEK(54):SYS46728:IFPEEK(54)<>BTHEN21
22 A=244:B=0:NEXT
23 REM
24 REM ********************************
25 REM *                              *
26 REM * ROM IN'S RAM IN 3 SEKUNDEN ! *
27 REM *                              *
28 REM ********************************